perm filename E.DIF[E,ALS] blob sn#259059 filedate 1977-01-25 generic text, type T, neo UTF8
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

**** File 1) E[CSP,SYS], Page 1 line 27
1)	C00129 00025	MARKS XMARK XXADD XXSUB XPADD XPSUB XLALL XXARRL XXPAGE XXLINE
1)	C00138 00026	DELLIN DELPOS
1)	C00140 00027	DELLP DELL2 DELDSP DELPR DELPR1 DELPR2
1)	C00146 00028	DELPM DELPM1 DELPM2 DELPM3
1)	C00150 00029	DELPAG DELPG1 ADJPG ADJPGL
1)	C00154 00030	RCOMP RCOMP1 RCOMP2 RCOMPX
1)	C00157 00031	DELETE DELET1 ADDPAG
1)	C00161 00032	APPEND APPLUZ
1)	C00164 00033	APPEN2 PMTXT PMPAG
1)	C00166 00034	INSERT INSER0
1)	C00168 00035	INSER1 INSER2 INSER3 INSER4 INSER5 INSER9 INSE10
1)	C00172 00036	INSER8 DIRADD
1)	C00174 00037	INSER6 INSER7 MARK NDIRCK
1)	C00176 00038	CONTQ
1)	C00178 00039	ATTACH ATTCH1 ARGCHK ARGCHN
1)	C00180 00040	ATTDO ATTDO0 ATTDO2 ATTDO1 ATTOK ATTCHK
1)	C00182 00041	ATTREP ATTEX ATTRE3 ATTRE4 ATTRE5 ATTRE6 ATTRE7 ATTRE8 ATTRE9
1)	C00186 00042	ATTKIL ATTKL ATTSRC GPAGL GPAGL0 GPAGL1 GPAGL2 GPAGL3 ATTWRT
1)	C00188 00043	ATTCOP ATTCP1 ATTCP
1)	C00190 00044	ATTCP0 ATTCPL ATCMOR ATTCP2 ATTCP3 GPAGL
1)	C00192 00045	EDIT EDIT1 LINED LINL1 EDDSP EDARG EDARGX ZLINE
1)	C00195 00046	EDFULL EDTAB EDNUL EDCR AGAIN EDRP1 EDRPT
1)	C00197 00047	EDGL EDGL1 EDGL2 EDGL2A EDGL2B EDGBSL IMLPTL
1)	C00200 00048	EDGL3 EDGL4 REEDIT REEDT2 EDTMOR EDGDSP EDTAB2 PTOUT PTPNT EDLF ALTCHK ALTFIX INCHAR INCHA2
1)	C00205 00049	EDCR2 EDACT EDACT2 EDITIT REPLIN PUTBAK UNINS FNEDIT EDLF2
1)	C00211 00050	EDPUT EDPLR
1)	C00213 00051	EDPS EDPL EDPLUZ
1)	C00215 00052	EDSNK
1)	C00216 00053	CRDSP REGCR REGCR1 REGCR2
1)	C00218 00054	CONTCR CNTCR2 METACR REPRST REPRS2 METAC2
1)	C00221 00055	LECR DUBLCR DUBCR1 DUBCR2 DUBCR3 DUBCR4
1)	C00224 00056	INSONA INSONE INSNUL INSNLP
1)	C00226 00057	LININS LININ LININ0 LININ1
1)	C00228 00058	PPSET ABCRLF ABCRL0 CMDCRL IPPSET DPPSET
1)	C00233 00059	OCT3ST NUMSTD NUMSTR OCTSTR OCTASC NUMSIX
1)	C00235 00060	SETWRT SETWR2 SETWRX BTAB SETWR4 CLEARX IDIOT
1)	C00238 00061	FRD FRD0 FRD1 NOEXT NOPRG NOPPN NOSWIT SWITL FRDMSG FLHACK FRD0A SETDEV FRD2 FRD2A NOPP1 SWLOP FRDX FRDX2 SIXOUT
1)	C00248 00062	GETNAM GETNML GETP GETPL DTYI1 DTYI DTYI2
1)	C00251 00063	DOSWIT DOSWI2 NTYI NTYIL NTYIM EDFIL EDFIL2 SRCFIL DSTFIL NTYINF NTYICM
1)	C00254 00064	RSCAN RSCAN0 RSCAN1 RSCAN2 RSCAN3 RSCAN4 RSCN4B RSCN4C RSCN4A RSCN0A
1)	C00259 00065	RSCAN5 RSCAN6 RSCAN7 RSCAN8 SYSCCK CRECHK
1)	C00261 00066	RSTYI RSTYI0 RSTYI1 UCASE TYI1 TYI2 TYI3 TYI4 TYI5 TYI6 TYI7 TYICHK CTYI1 CTYI2 POPUP POPCJ CSTYI1
1)	C00265 00067	TYI TYIT TYIU
1)	C00266 00068	TMPRED TMPRD1 TMPRD2 TMPRDX RPGRD1 BKPRED
1)	C00272 00069	TMPWRT BKPWRT TMPCOR
1)	C00276 00070	FILERR FILTYP FILSTR PPNTYP FILETB
1)	C00278 00071	SIXTYO SIXTYL SIXTY2 SIXTYN SIXTNL SIXTNN PNTYO PNTYOL
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

1)	C00279 00072	UUOH UUODSP UFCE UTYPCH UTYPC2 UTYPDE UTYPOC
1)	C00280 00073	UTYPR UTYPR1 USORRY UFATAL FATFIX TELLX TELLZ FATFI2 PANIC
1)	C00284 00074	OPENI OPNOI IOPEN SETI SETRLD OPNDEV RELDEV OPNLUZ
1)	C00288 00075	RLD RLD1 RLD2 RLDX RLDLUZ FIXEOF ENTLUZ ENTL2 RLDCHK
1)	C00292 00076	EXTCHK EXTCH1 EXTCH2 EXTCH3 EXTCH4 EXTTAB
1)	C00294 00077	OPENW OPENO SETO FPAUSE PAUSE PAUS2 BYE
1)	C00296 00078	CLOSO CLOSO2 WRBUF WRBF1 WRBF2 WRBF3 WRBF4 ENTR OBUF IBUF IBFE
1)	C00298 00079	INTLUZ INTDSP PDLOV PDLOV1 PDLOV2 PDLOV3 ISAV TSINT TSNINT
1)	C00302 00080	FSINI FSINI1 MORCOR INTERR INTX INTPOV
1)	C00305 00081	FSGET FSLUP0 FSLUP FSGRAB FSXIT
1)	C00308 00082	FSNEWT FSNEWP FSNEW
1)	C00309 00083	FSTSML FSNEXT FSHRET FSLLUZ
1)	C00312 00084	FSLSCN FSLSCL FSLFR FSLSHF FSLSLP FSLMOV FSLDON
1)	C00315 00085	FSHSCN, FSHSCL, FSHFR, FSHSHF, FSHSLP, FSHSR, FSHMOV
1)	C00317 00086	FSBLT, POPTJ, FSBLT1
1)	C00318 00087	FSBLT2, FSBLT3, FSHBLT, FSHBL2
1)	C00319 00088	PNTREL, SHFTB, STDSH1, STDSHF, RELOC, RELOCL
1)	C00321 00089	FSGIVE, FSGIV1, FSGIV2
1)	C00322 00090	CORCHK CRUNCH CMPACT
1)	C00324 00091	ENDSET ENDFIX
1)	C00328 00092	FSCHK, FCLUP1, FCLUP2, FCFR, FCDON
1)	C00330 00093	FUCHK, MOVIT, MOVTX
1)	C00332 00094	PURINI, PLCHK, PL2CHK, PLCHKL, PLSCN0, PLSCN, PLSCN1, PLSCN2, PLSCN3
1)	C00334 00095	PURCHK, PURCH1, PURCH2, PURCH3, PURC3A
1)	C00337 00096	PURCH4, PURCH5, PURCH6, PURCH7, PURCLC, TYPHW, PURCK, PLCHK1, PLCHK2, PURFLG
1)	C00339 00097	SAVIT
1)	C00341 00098	CHECK, CHECK1, CHECK2
1)	C00342 00099	CHKDIR, CHKDPL
1)	C00344 00100	CHKDR1 CHKD1A CHKDR2 CDDSP CHKDR3 CHKDR4 CHKD4A
1)	C00346 00101	CHKLST, CHKFS, CHKFSL, CHKFS2, CHKPNT, CHKPN2
1)	C00347 00102	CHKPAG, CHKPGP
1)	C00348 00103	CHKPG1, CHKPG2, CPDSP, CHKPGT, CHKPTL
1)	C00350 00104	CHKPG3, CHKPG4, CHKPG5, CHKPG6
1)	C00351 00105	CHKATT, CHKNAT
1)	C00352 00106	CTAB 0-37
1)	C00356 00107	CTAB 40-77
1)	C00358 00108	CTAB 100-137
1)	C00360 00109	CTAB 140-177
1)	C00362 00110	GETDIR
1)	C00364 00111	DIRCL2, DIRCL, DIRCL1, GETDR1
1)	C00367 00112	DIRLIN DIRLUP DIRDON GDIRX DIRLF DIRLF1 DIRLF2 FINDIR XDRDSP XDIRLN XDIRIL XDCRLF XDIRFF DIRLN2
1)	C00379 00113	LOSDIR BADDIR BADDI2 NODIR DIRNUM GDDSP LSKP1 DIRSHF DIREND UGHDIR FLSDIR IGNDIR DELDIR
1)	C00384 00114	COPFIL, COPFL1, COPDO, COPYX, COPDAT, COPLUP
1)	C00387 00115	COPCOR, COPCHK, YESCHK, COPCMD
1)	C00389 00116	FORMAT FMTOK FMTDSP FORMT2 FORMT3 FORMT4 FORMT5 FORMT6
1)	C00392 00117	NEWDIR NEWDLP SKPDSP NEWDFF OPUT OSET TMPDIR
1)	C00394 00118	MAKDIR MAKDR0 MAKDR1 MAKDOL MDOL1
1)	C00397 00119	MDIL1 MDIL1A MDIL2 MDIL2A MDCSRC MDCSR1 MD1DSP
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

1)	C00400 00120	MDIL1B MAKDLF MAKDFF MDFF1 MDFF2 MDFF3 MDFF4 MDCEOL MD2DSP RLDCHK RLDCK1 RLDCK2 RLDCK3 RLDCKX
1)	C00406 00121	MD1CR MD2CR MD3CR MD3CR1 MDIL3 MDCRCK MDFIX MDLFCK
1)	C00410 00122	CREATE CREAT2 CTEXT
1)	C00412 00123	RDSPA1 RDPAGE RDPGOK RDSPAG RDPAG0 RDSPA2 RDSPA4 RDSPA5
1)	C00416 00124	RDPAG2 RDPAG1 RDLINE RDLLP RDLTAB TELLD1 TELLDZ PSEUDO
1)	C00419 00125	RDLCR RDLLF RDLONG RDLCR2 RDLCR1 RDLCR0
1)	C00421 00126	RDLFF RDLDON LINSET RPDSP RDLNUL LINSE2
1)	C00423 00127	RDPGLZ, SOSTST, SOSCHK, SOSCK2, PGMK, PGMK2
1)	C00425 00128	DIRCHK DIRNEW DIRNW2 DIRNW1 TXTSHF
1)	C00427 00129	FNDLIN, FNDPAG, FNDLN1, FNDLN2, FNDLN3
1)	C00429 00130	REMPTR FIXPTR FNDPT1 FNDPT2 LPTRTB DPTRTB ARRL TOPWIN LINES FIRPAG CURPAG PAGES
1)	C00432 00131	DIRGET, DIRGL, DGEND, DRGSET
1)	C00434 00132	NUM5, NUM5A, DIRHED, DIRTXT, DIREMK, DGDSP
1)	C00436 00133	OUTDIR, OUTDOK, OUTDLP, ODDSP, ODDON, ODEXP
1)	C00438 00134	INSDIR INSD3 INSD4 INSD5 IDDSP0 IDDSP IDTAB
1)	C00441 00135	SCOMS NSCOMS SCOMS2 INSD1
1)	C00444 00136	IDNUL IDDON IDTAB0
1)	C00446 00137	DIRSET, DIRST1, DIRUP, DIRUP1, DIRUP2, DIRUP3
1)	C00447 00138	DIRFIX, DIRFX1, DIRFX2, DIRFX3, DIRFX4, DIRFXN
1)	C00449 00139	SCRTOP PPSIZ NLINES LINMAX DPY IMLDPY IMLACL ARRPOS AR2POS ARPOS2 ARRBUF FIRWRD LEDTST DISPI WIPI DBLTI PCOMP P2COMP DDWAIT DISPAI
1)	C00453 00140	DISPXA DISP1A DISP2I LEPREP LETST SPCOUT DPYHED DDACT DPYBUF DPYTAB DPYLOC MASK BRKTAB BOTAPS BOTID BOTAR3 DMLHDR LINECI SHFHDR
1)	C00456 00141	HEADERS & TRAILERS -- TOPSTR HEDPAG HEDNAM ROFLG WFLAG TOPDSH HEDLIN BOTSTR DOTS
1)	C00459 00142	DPYINI DPYCHK TTYTST MTLINE LOADMT DPYCHG
1)	C00464 00143	DPYI2 NODPY WIPE IWIPE DMWIPE WIPER
1)	C00468 00144	SETSCR NMVAR1 NMVARR MOVARR SETARR DSTRL TRLARR GOLINE TRAILS TRAIL0
1)	C00479 00145	SETWIN WINCHK WINCH2 GLDOWN GLUP POPWIN DWNWIN REWIN CENWIN SETWN2
1)	C00484 00146	DISP DISP0 DISP1 DISP2 DISP6 DISP2M
1)	C00488 00147	DISP3 DISP3A DISP4 DISP4A DISP5 DUMMY EXCLR EXSET EXTST
1)	C00491 00148	DISPAT DISPAX
1)	C00494 00149	DDISPX DDSPX2 DDDONE WIPIT WIPL WIPL2 DMDONE MDISPX MDDISP MDSPX2
1)	C00497 00150	DDCOP DDLUZ LINREL LINRLL IDISP IDISP2
1)	C00500 00151	IIIARR IIIAR2 IIIAR3 DMARRL IDMTAB CNTNUL CNTNU2
1)	C00504 00152	LESET LEADJ LECLR LEADDM LEADJ2
1)	C00506 00153	DBLT DBLT1 DBLT2 DBLT3 DBLT4 DBLT5 DBLT6 DBLT7 IDISPX DISPX PPBAJ1 POPBAJ POPAJ
1)	C00509 00154	PCOMPD PCOMPI PCOMPM PCOMPS P2CMPD P2CMPI P2CMPM PCMPID
1)	C00511 00155	DDISP DDISP2 DMARR
1)	C00513 00156	DOARR DOAR2 OFFARR ONARR
1)	C00514 00157	DDISPS DDSPS2 DDSPS3 DDSPSX DDSPS4
1)	C00518 00158	DSPSAT DSPSAX SHIFT DMSPS2 DMSPS3 DMSPS4 DMSPSX DMPSAT DMPSAX DMBLTS DMBLT3 DMBLA
1)	C00538 00159	DBLTS DBLTS2 DBLTSN DBLTS3 DBLTS1 DBLTSA DBLTA DBLTA2 DBLTS0 DBLTSB
1)	C00541 00160	TDISP TDISP0 TDISP1 TDISP2 TDISP3 TDISPE
1)	C00543 00161	TDISP4 TDISP5 TYPE TYPEL TDISPM
1)	C00545 00162	WRPAGE WRPAG1 WRPAG2 WRBOOK
1)	C00549 00163	WRPX0 WRPX WRPX1 WRPX1A WRPX1B WRPX2 WRPXBP
1)	C00551 00164	WRPX3 WRPX4
1)	C00554 00165	WRPOK WRTIT WRT0
1)	C00556 00166	WRP1 WRLINE WRLUP WRLP2 WRRDO WRRDO2 WRRDO3 
1)	C00558 00167	WRDSP WRTAB WRCHK WRDONE WRDON2
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

1)	C00560 00168	WRPM BTAB2
1)	C00562 00169	FLSPAG FLSPGL FLSPG2 CLRWRT CLRWR2 DSHED
1)	C00563 00170	TV RSYS RUN RUN1
1)	C00566 00171	RUNILL, RUNNON, RUNFNF, RUNDEV, RUNFIL
1)	C00567 00172	SEARCH ROUTINES
1)	C00569 00173	SREAD SREAD0 SREAD1 SREAD2 SREAD3 SREAD4 SRSTOR SRSTR2 QREAD QREADX QREADY QRACT QRACT2 QABORT
1)	C00584 00174	SRACT SREAD5 SRALT SRALT2 SRALUZ SREDT ASTER BSLAS BSLXCT BSLXC2 SREAD5 SREAD6
1)	C00594 00175	FINDIT FOUND FNDMOV FNDERR SUBSTP SUBERR FND2 FND2A SETJMP SUBSP3 SUBSP2 FNDER2 FNDER3 FNDER5
1)	C00599 00176	FIND
1)	C00602 00177	DIRSRC DIRSR2 DFERR SRCDF SDFCR
1)	C00605 00178	EXACT SSET SSET2
1)	C00606 00179	SCOMP SFLUSH NOSRCH SFLSH1 SFLSL
1)	C00608 00180	SBARF, SBARF1, SARRGH, SFSGT, SFSGET, SFSPUT, SFSPTL
1)	C00610 00181	SPARSE
1)	C00611 00182	SPARS1, SPARS2, SPDSP, SSCAN, SSCANA, SSCANX
1)	C00613 00183	SSCAN1, SSCN1A, SSCN1B, SSCQT, SSCBIN, SSCINF, SSCNOT, SSCUOP, SSCVB
1)	C00615 00184	SSCLP, SSCDSP
1)	C00616 00185	SGRAPH, SGRPH1, SGRPH2, SGRPHX, SGDO1, SGDO1X, SGDOX2, SGDSP, SGDO1B
1)	C00618 00186	SGNOT
1)	C00619 00187	SBACK, SBACK1, SBACK2, SBACK3, SBACK4
1)	C00621 00188	SBBRCH, SBBR2
1)	C00622 00189	SBCALC, SBCAL0, SBCAL1, SBCAL2, SBCAL3
1)	C00623 00190	SBCAL4, SBCNON, SBCX, SBCOPL, SBCOP2, SBCEND, SBCEN2, SBCFIX, SBCFXL, SBCFXE, POPJ2
1)	C00625 00191	SBCOK, SBCEN1, SBCLUZ, SBCLZ1, SBCNXT, SBCBP, SBCBPL
1)	C00627 00192	SBCCB, SBCCB1, SBCCB2, SBCCB8, SBCCB3, SBCCB4, SBCCB5
1)	C00629 00193	SBCCB6, SBCCB7, BITCNT, BITCN1
1)	C00630 00194	NEWBIT, NEWBT0, NEWBT1, NEWBT2, NEWBT3, NEWBT4, NEWBT5
1)	C00632 00195	NEWBTC, NEWBC1, NEWBC2, NEWBC3, NEWBNC, NEWBN1, NEWBN2, NEWBN3, NEWBCZ, NEWBNZ
1)	C00634 00196	SCCOM, SCCNOT
1)	C00635 00197	SCCBIT
1)	C00636 00198	MAKBIT, MAKBT0, MAKBT1, MAKBTN, MAKBN2, MAKBTB, MAKBB3
1)	C00638 00199	MAKBNB, MAKBBT, MAKBB2, MBDSP, MBIND, MBIND2
1)	C00640 00200	SCGEN
1)	C00641 00201	SCGEN1, SCGEN2, SCGEN3, SCGEN4, SCGEN5, SCGEN6
1)	C00643 00202	SCGTST, SCGT2, SCGT3, SCGDSP, SCGCN, SCGCN2, SCGBTN, SCGBT
1)	C00645 00203	SCGE, SCGE2, SCGEL, SCGBAK, SCGBK1, SCGBK2, SCGBK3, SCGFA, SCGNC, SCGNFA
1)	C00647 00204	SCGHB, SCGHB0, SCGHB5, SCGHB1, SCGHB2, SCGHB3, SCGHB4, SCGHBX, SCGHX2
1)	C00649 00205	SCGCB, SCGCB0, SCGCB1, SCGCB2, SCGCB3, SCGCB4, SCGCB5, SCGHCB
1)	C00651 00206	SBTMAK, SBTMK1, SBTMK2, SBTMK3, SBTMK4, SCGENB, SCGHB, SSVINS, SCXCT, SBKNW, SBKNWA, SBKDSP
1)	C00653 00207	SRCPAG SRCPG1 SPFIN SPFL SPFL2 SPFX NOSRC2 SRCLBL SRCPG3
1)	C00656 00208	GBYTP, GBYTPL, GBTPX, GBPDSP, GBPTAB
1)	C00657 00209	SRCPGF, SPFTAB, SPFCR, SPFLUZ
1)	C00658 00210	SRCPGB, SPFTAB, SBKNL, SBKNUL
1)	C00660 00211	SRCSET, SRCST1, SRCSTL, SRCST2
1)	C00661 00212	SCALL, SRCHX, SRCHLX
1)	C00663 00213	SCNBAK, SCNBKL
1)	C00665 00214	SCONTF SRCFNP SRCFNB SFNB2 SFRETR SRCDPY SRCDP2 SRCFPP SRCDP3 NOSRCP SRCHED, SRCDD
1)	C00670 00215	SRCFF, SFFNUL, SGTACS, SRTACS
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

1)	C00671 00216	SRCFB, SFBNUL, SBKNB, SBKNB2, SIOERR, SBKNP
1)	C00672 00217	JCTAB
1)	C00681 00218	J1DSP J2DSP J3DSP J4DSP J5DSP J6DSP J7DSP
1)	C00694 00219	PARGET NEXTLI ADJARG JNEW JMORE JUFIX JBLANK JMSTRT JSTART
1)	C00704 00220	JINIT JPREAD JMREAD SWTABL SWNOTE SWNOTT JUDATA JUTYPO
1)	C00712 00221	TJ1DSP TJROOM TABLE TJFILL TJUST TJDATA
1)	C00723 00222	SJFILL SJUSTA JFILL JUST JU7
1)	C00734 00223	IND INDENT INREAD CENTER ALIGN LFARR RTARR TIN SIN
1)	C00746 00224	JGINIT JGB JGIND JGMAR JGET
1)	C00752 00225	TJREAD TJADJ TJGET TJG1 TJTYPO
1)	C00763 00226	BREAK JOIN JOIN7
1)	C00776 00227	TJU1
1)	C00783 00228	MACRO FREE STORAGE - MFSCLR,GETMFS,FREMFS
1)	C00785 00229	MACTYI
1)	C00787 00230	ZDATA ZSIX ZBLT ZEDFIL ZLIST EXIST EXISTF ZSAVE ZFLDIR ZUNPAK
1)	C00802 00231	LAMBDA EPSIL NWFILE HOME QUERY HOMEG LAMBDG EPSIL5 LAMEPS EPSIL2 EPSIL3 EPSIL4 EPSIL1
1)	C00815 00232	********* BEG OF ESSAY DEFS *********
1)	C00834 00233	SUBSTR SUBST1 SUBOVE SUBST5 QFAST1 QFAST5 SUBSAY QFAST6 QFAST9
1)	C00841 00234	SPOOLC XSPOOL MAIOUT XWRDSP MAISPL XCLOSO XWRPM XWRDON XWRBF3 XWRTAB XWRLUP XWRLIN SPLINI
1)	C00852 00235	BEGIN SPSUB
1)	C00859 00236	FBISPC FBITAB ADRS FBINAM SAVCH2 SAVCHR TELBUF,CHKUP,CHECKU,CHTEXT,ASCASC,CHOUT3,CHOUT6
1)	C00869 00237	FILEID TELLME FBI
1)	C00888 00238	MAP
1)	C00896 00239	PAREN
1)	C00899 00240	PARSAV PARL PARR PAR PARFND PARB PAREXT PARRCD PARNUL
1)	C00921 00241	BACKGO BEEPCK BEEPST BEEPS1 BEEPME BEEPUU
1)	C00925 00242	MSG CHKMSG MSG0B MSG0A MSG0 MSG1 MSG2 MSG5 MSG6 MSG7 MSGLUZ MSGBK MSGBK0 CHKMS0
1)	C00933 00243	MACDEF MACCAL MACSTP MACESC MACLIN MACTYP MACINT MACLTT MACKLD
1)	C00948 00244	BURP BURPEX UPDATE PROTEC AUTOBU
1)	C00954 00245	MAIL SEND REMIND
1)	C00956 00246	ALIAS SETHED ALIAS2 ALIAS3 ALIAS4 ALIAS5 SETHD2
1)	C00959 00247	SAVE SPLSTR SAVFIL
1)	C00963 00248	LBLSRC LBLSR2 LBLERR LBLOOP
1)	C00966 00249	HEIGHT HEIGH2 HEIGH3 HEIGH4
1)	C00968 00250	PDL PATCH PAT ZVARS LEGTAB BUF TCBUF RBUF FNDTBF FNDBUF DIR SYSCMD TYIPNT
1)	C00970 ENDMK
1)	C⊗;
**** File 2) E.85[CSP,SYS], Page 1 line 27
2)	C00129 00025	MARKS XMARK XMPAGE XXADD XXSUB XPADD XPSUB XLALL XXARRL XXPAGE XXLINE
2)	C00143 00026	DELLIN DELPOS
2)	C00145 00027	DELLP DELL2 DELDSP DELPR DELPR1 DELPR2
2)	C00151 00028	DELPM DELPM1 DELPM2 DELPM3
2)	C00154 00029	DELPAG DELPG1 ADJPG ADJPGL
2)	C00158 00030	RCOMP RCOMP1 RCOMP2 RCOMPX
2)	C00161 00031	DELETE DELET1 ADDPAG
2)	C00164 00032	APPEND APPLUZ
2)	C00167 00033	APPEN2 PMTXT PMPAG
2)	C00169 00034	INSERT INSER0
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

2)	C00171 00035	INSER1 INSER2 INSER3 INSER4 INSER5 INSER9 INSE10
2)	C00175 00036	INSER8 DIRADD
2)	C00177 00037	INSER6 INSER7 MARK NDIRCK
2)	C00179 00038	CONTQ
2)	C00181 00039	ATTACH ATTCH1 ARGCHK ARGCHN
2)	C00183 00040	ATTDO ATTDO0 ATTDO2 ATTDO1 ATTOK ATTCHK
2)	C00185 00041	ATTREP ATTEX ATTRE3 ATTRE4 ATTRE5 ATTRE6 ATTRE7 ATTRE8 ATTRE9
2)	C00189 00042	ATTKIL ATTKL ATTSRC GPAGL GPAGL0 GPAGL1 GPAGL2 GPAGL3 ATTWRT
2)	C00191 00043	ATTCOP ATTCP1 ATTCP
2)	C00193 00044	ATTCP0 ATTCPL ATCMOR ATTCP2 ATTCP3 GPAGL
2)	C00195 00045	EDIT EDIT1 LINED LINL1 EDDSP EDARG EDARGX ZLINE
2)	C00198 00046	EDFULL EDTAB EDNUL EDCR AGAIN EDRP1 EDRPT
2)	C00200 00047	EDGL EDGL1 EDGL2 EDGL2A EDGL2B EDGBSL IMLPTL
2)	C00203 00048	EDGL3 EDGL4 REEDIT REEDT2 EDTMOR EDGDSP EDTAB2 PTOUT PTPNT EDLF ALTCHK ALTFIX INCHAR INCHA2
2)	C00208 00049	EDCR2 EDACT EDACT2 EDITIT REPLIN PUTBAK UNINS FNEDIT EDLF2
2)	C00214 00050	EDPUT EDPLR
2)	C00216 00051	EDPS EDPL EDPLUZ
2)	C00218 00052	EDSNK
2)	C00219 00053	CRDSP REGCR REGCR1 REGCR2
2)	C00221 00054	CONTCR CNTCR2 METACR REPRST REPRS2 METAC2
2)	C00224 00055	LECR DUBLCR DUBCR1 DUBCR2 DUBCR3 DUBCR4
2)	C00227 00056	INSONA INSONE INSNUL INSNLP
2)	C00229 00057	LININS LININ LININ0 LININ1
2)	C00231 00058	PPSET ABCRLF ABCRL0 CMDCRL IPPSET DPPSET
2)	C00236 00059	OCT3ST NUMSTD NUMSTR OCTSTR OCTASC NUMSIX
2)	C00238 00060	SETWRT SETWR2 SETWRX BTAB SETWR4 CLEARX IDIOT
2)	C00241 00061	FRD FRD0 FRD1 NOEXT NOPRG NOPPN NOSWIT SWITL FRDMSG FLHACK FRD0A SETDEV FRD2 FRD2A NOPP1 SWLOP FRDX FRDX2 SIXOUT
2)	C00251 00062	GETNAM GETNML GETP GETPL DTYI1 DTYI DTYI2
2)	C00254 00063	DOSWIT DOSWI2 NTYI NTYIL NTYIM EDFIL EDFIL2 SRCFIL DSTFIL NTYINF NTYICM
2)	C00257 00064	RSCAN RSCAN0 RSCAN1 RSCAN2 RSCAN3 RSCAN4 RSCN4B RSCN4C RSCN4A RSCN0A
2)	C00262 00065	RSCAN5 RSCAN6 RSCAN7 RSCAN8 SYSCCK CRECHK
2)	C00264 00066	RSTYI RSTYI0 RSTYI1 UCASE TYI1 TYI2 TYI3 TYI4 TYI5 TYI6 TYI7 TYICHK CTYI1 CTYI2 POPUP POPCJ CSTYI1
2)	C00268 00067	TYI TYIT TYIU
2)	C00269 00068	TMPRED TMPRD1 TMPRD2 TMPRDX RPGRD1 BKPRED
2)	C00275 00069	TMPWRT BKPWRT TMPCOR
2)	C00279 00070	FILERR FILTYP FILSTR PPNTYP FILETB
2)	C00281 00071	SIXTYO SIXTYL SIXTY2 SIXTYN SIXTNL SIXTNN PNTYO PNTYOL
2)	C00282 00072	UUOH UUODSP UFCE UTYPCH UTYPC2 UTYPDE UTYPOC
2)	C00283 00073	UTYPR UTYPR1 USORRY UFATAL FATFIX TELLX TELLZ FATFI2 PANIC
2)	C00287 00074	OPENI OPNOI IOPEN SETI SETRLD OPNDEV RELDEV OPNLUZ
2)	C00291 00075	RLD RLD1 RLD2 RLDX RLDLUZ FIXEOF ENTLUZ ENTL2 RLDCHK
2)	C00295 00076	EXTCHK EXTCH1 EXTCH2 EXTCH3 EXTCH4 EXTTAB
2)	C00297 00077	OPENW OPENO SETO FPAUSE PAUSE PAUS2 BYE
2)	C00299 00078	CLOSO CLOSO2 WRBUF WRBF1 WRBF2 WRBF3 WRBF4 ENTR OBUF IBUF IBFE
2)	C00301 00079	INTLUZ INTDSP PDLOV PDLOV1 PDLOV2 PDLOV3 ISAV TSINT TSNINT
2)	C00305 00080	FSINI FSINI1 MORCOR INTERR INTX INTPOV
2)	C00308 00081	FSGET FSLUP0 FSLUP FSGRAB FSXIT
2)	C00311 00082	FSNEWT FSNEWP FSNEW
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

2)	C00312 00083	FSTSML FSNEXT FSHRET FSLLUZ
2)	C00315 00084	FSLSCN FSLSCL FSLFR FSLSHF FSLSLP FSLMOV FSLDON
2)	C00318 00085	FSHSCN, FSHSCL, FSHFR, FSHSHF, FSHSLP, FSHSR, FSHMOV
2)	C00320 00086	FSBLT, POPTJ, FSBLT1
2)	C00321 00087	FSBLT2, FSBLT3, FSHBLT, FSHBL2
2)	C00322 00088	PNTREL, SHFTB, STDSH1, STDSHF, RELOC, RELOCL
2)	C00324 00089	FSGIVE, FSGIV1, FSGIV2
2)	C00325 00090	CORCHK CRUNCH CMPACT
2)	C00327 00091	ENDSET ENDFIX
2)	C00331 00092	FSCHK, FCLUP1, FCLUP2, FCFR, FCDON
2)	C00333 00093	FUCHK, MOVIT, MOVTX
2)	C00335 00094	PURINI, PLCHK, PL2CHK, PLCHKL, PLSCN0, PLSCN, PLSCN1, PLSCN2, PLSCN3
2)	C00337 00095	PURCHK, PURCH1, PURCH2, PURCH3, PURC3A
2)	C00340 00096	PURCH4, PURCH5, PURCH6, PURCH7, PURCLC, TYPHW, PURCK, PLCHK1, PLCHK2, PURFLG
2)	C00342 00097	SAVIT
2)	C00344 00098	CHECK, CHECK1, CHECK2
2)	C00345 00099	CHKDIR, CHKDPL
2)	C00347 00100	CHKDR1 CHKD1A CHKDR2 CDDSP CHKDR3 CHKDR4 CHKD4A
2)	C00349 00101	CHKLST, CHKFS, CHKFSL, CHKFS2, CHKPNT, CHKPN2
2)	C00350 00102	CHKPAG, CHKPGP
2)	C00351 00103	CHKPG1, CHKPG2, CPDSP, CHKPGT, CHKPTL
2)	C00353 00104	CHKPG3, CHKPG4, CHKPG5, CHKPG6
2)	C00354 00105	CHKATT, CHKNAT
2)	C00355 00106	CTAB 0-37
2)	C00359 00107	CTAB 40-77
2)	C00361 00108	CTAB 100-137
2)	C00363 00109	CTAB 140-177
2)	C00365 00110	GETDIR
2)	C00367 00111	DIRCL2, DIRCL, DIRCL1, GETDR1
2)	C00370 00112	DIRLIN DIRLUP DIRDON GDIRX DIRLF DIRLF1 DIRLF2 FINDIR XDRDSP XDIRLN XDIRIL XDCRLF XDIRFF DIRLN2
2)	C00382 00113	LOSDIR BADDIR BADDI2 NODIR DIRNUM GDDSP LSKP1 DIRSHF DIREND UGHDIR FLSDIR IGNDIR DELDIR
2)	C00387 00114	COPFIL, COPFL1, COPDO, COPYX, COPDAT, COPLUP
2)	C00390 00115	COPCOR, COPCHK, YESCHK, COPCMD
2)	C00392 00116	FORMAT FMTOK FMTDSP FORMT2 FORMT3 FORMT4 FORMT5 FORMT6
2)	C00395 00117	NEWDIR NEWDLP SKPDSP NEWDFF OPUT OSET TMPDIR
2)	C00397 00118	MAKDIR MAKDR0 MAKDR1 MAKDOL MDOL1
2)	C00400 00119	MDIL1 MDIL1A MDIL2 MDIL2A MDCSRC MDCSR1 MD1DSP
2)	C00403 00120	MDIL1B MAKDLF MAKDFF MDFF1 MDFF2 MDFF3 MDFF4 MDCEOL MD2DSP RLDCHK RLDCK1 RLDCK2 RLDCK3 RLDCKX
2)	C00409 00121	MD1CR MD2CR MD3CR MD3CR1 MDIL3 MDCRCK MDFIX MDLFCK
2)	C00413 00122	CREATE CREAT2 CTEXT
2)	C00415 00123	RDSPA1 RDPAGE RDPGOK RDSPAG RDPAG0 RDSPA2 RDSPA4 RDSPA5
2)	C00419 00124	RDPAG2 RDPAG1 RDLINE RDLLP RDLTAB TELLD1 TELLDZ PSEUDO
2)	C00422 00125	RDLCR RDLLF RDLONG RDLCR2 RDLCR1 RDLCR0
2)	C00424 00126	RDLFF RDLDON LINSET RPDSP RDLNUL LINSE2
2)	C00426 00127	RDPGLZ, SOSTST, SOSCHK, SOSCK2, PGMK, PGMK2
2)	C00428 00128	DIRCHK DIRNEW DIRNW2 DIRNW1 TXTSHF
2)	C00430 00129	FNDLIN, FNDPAG, FNDLN1, FNDLN2, FNDLN3
2)	C00432 00130	REMPTR FIXPTR FNDPT1 FNDPT2 LPTRTB DPTRTB ARRL TOPWIN LINES FIRPAG CURPAG PAGES
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

2)	C00435 00131	DIRGET, DIRGL, DGEND, DRGSET
2)	C00437 00132	NUM5, NUM5A, DIRHED, DIRTXT, DIREMK, DGDSP
2)	C00439 00133	OUTDIR, OUTDOK, OUTDLP, ODDSP, ODDON, ODEXP
2)	C00441 00134	INSDIR INSD3 INSD4 INSD5 IDDSP0 IDDSP IDTAB
2)	C00444 00135	SCOMS NSCOMS SCOMS2 INSD1
2)	C00447 00136	IDNUL IDDON IDTAB0
2)	C00449 00137	DIRSET, DIRST1, DIRUP, DIRUP1, DIRUP2, DIRUP3
2)	C00450 00138	DIRFIX, DIRFX1, DIRFX2, DIRFX3, DIRFX4, DIRFXN
2)	C00452 00139	SCRTOP PPSIZ NLINES LINMAX DPY IMLDPY IMLACL ARRPOS AR2POS ARPOS2 ARRBUF FIRWRD LEDTST DISPI WIPI DBLTI PCOMP P2COMP DDWAIT DISPAI
2)	C00456 00140	DISPXA DISP1A DISP2I LEPREP LETST SPCOUT DPYHED DDACT DPYBUF DPYTAB DPYLOC MASK BRKTAB BOTAPS BOTID BOTAR3 DMLHDR LINECI SHFHDR
2)	C00459 00141	HEADERS & TRAILERS -- TOPSTR HEDPAG HEDNAM ROFLG WFLAG TOPDSH HEDLIN BOTSTR DOTS
2)	C00462 00142	DPYINI DPYCHK TTYTST MTLINE LOADMT DPYCHG
2)	C00467 00143	DPYI2 NODPY WIPE IWIPE DMWIPE WIPER
2)	C00471 00144	SETSCR NMVAR1 NMVARR MOVARR SETARR DSTRL TRLARR GOLINE TRAILS TRAIL0
2)	C00482 00145	SETWIN WINCHK WINCH2 GLDOWN GLUP POPWIN DWNWIN REWIN CENWIN SETWN2
2)	C00487 00146	DISP DISP0 DISP1 DISP2 DISP6 DISP2M
2)	C00491 00147	DISP3 DISP3A DISP4 DISP4A DISP5 DUMMY EXCLR EXSET EXTST
2)	C00494 00148	DISPAT DISPAX
2)	C00497 00149	DDISPX DDSPX2 DDDONE WIPIT WIPL WIPL2 DMDONE MDISPX MDDISP MDSPX2
2)	C00500 00150	DDCOP DDLUZ LINREL LINRLL IDISP IDISP2
2)	C00503 00151	IIIARR IIIAR2 IIIAR3 DMARRL IDMTAB CNTNUL CNTNU2
2)	C00507 00152	LESET LEADJ LECLR LEADDM LEADJ2
2)	C00509 00153	DBLT DBLT1 DBLT2 DBLT3 DBLT4 DBLT5 DBLT6 DBLT7 IDISPX DISPX PPBAJ1 POPBAJ POPAJ
2)	C00512 00154	PCOMPD PCOMPI PCOMPM PCOMPS P2CMPD P2CMPI P2CMPM PCMPID
2)	C00514 00155	DDISP DDISP2 DMARR
2)	C00516 00156	DOARR DOAR2 OFFARR ONARR
2)	C00517 00157	DDISPS DDSPS2 DDSPS3 DDSPSX DDSPS4
2)	C00521 00158	DSPSAT DSPSAX SHIFT DMSPS2 DMSPS3 DMSPS4 DMSPSX DMPSAT DMPSAX DMBLTS DMBLT3 DMBLA
2)	C00541 00159	DBLTS DBLTS2 DBLTSN DBLTS3 DBLTS1 DBLTSA DBLTA DBLTA2 DBLTS0 DBLTSB
2)	C00544 00160	TDISP TDISP0 TDISP1 TDISP2 TDISP3 TDISPE
2)	C00546 00161	TDISP4 TDISP5 TYPE TYPEL TDISPM
2)	C00548 00162	WRPAGE WRPAG1 WRPAG2 WRBOOK
2)	C00552 00163	WRPX0 WRPX WRPX1 WRPX1A WRPX1B WRPX2 WRPXBP
2)	C00554 00164	WRPX3 WRPX4
2)	C00557 00165	WRPOK WRTIT WRT0
2)	C00559 00166	WRP1 WRLINE WRLUP WRLP2 WRRDO WRRDO2 WRRDO3 
2)	C00561 00167	WRDSP WRTAB WRCHK WRDONE WRDON2
2)	C00563 00168	WRPM BTAB2
2)	C00565 00169	FLSPAG FLSPGL FLSPG2 CLRWRT CLRWR2 DSHED
2)	C00566 00170	TV RSYS RUN RUN1
2)	C00569 00171	RUNILL, RUNNON, RUNFNF, RUNDEV, RUNFIL
2)	C00570 00172	SEARCH ROUTINES
2)	C00572 00173	SREAD SREAD0 SREAD1 SREAD2 SREAD3 SREAD4 SRSTOR SRSTR2 QREAD QREADX QREADY QRACT QRACT2 QABORT
2)	C00587 00174	SRACT SREAD5 SRALT SRALT2 SRALUZ SREDT ASTER BSLAS BSLXCT BSLXC2 SREAD5 SREAD6
2)	C00597 00175	FINDIT FOUND FNDMOV FNDERR SUBSTP SUBERR FND2 FND2A SETJMP SUBSP3 SUBSP2 FNDER2 FNDER3 FNDER5
2)	C00602 00176	FIND
2)	C00605 00177	DIRSRC DIRSR2 DFERR SRCDF SDFCR
2)	C00608 00178	EXACT SSET SSET2
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

2)	C00609 00179	SCOMP SFLUSH NOSRCH SFLSH1 SFLSL
2)	C00611 00180	SBARF, SBARF1, SARRGH, SFSGT, SFSGET, SFSPUT, SFSPTL
2)	C00613 00181	SPARSE
2)	C00614 00182	SPARS1, SPARS2, SPDSP, SSCAN, SSCANA, SSCANX
2)	C00616 00183	SSCAN1, SSCN1A, SSCN1B, SSCQT, SSCBIN, SSCINF, SSCNOT, SSCUOP, SSCVB
2)	C00618 00184	SSCLP, SSCDSP
2)	C00619 00185	SGRAPH, SGRPH1, SGRPH2, SGRPHX, SGDO1, SGDO1X, SGDOX2, SGDSP, SGDO1B
2)	C00621 00186	SGNOT
2)	C00622 00187	SBACK, SBACK1, SBACK2, SBACK3, SBACK4
2)	C00624 00188	SBBRCH, SBBR2
2)	C00625 00189	SBCALC, SBCAL0, SBCAL1, SBCAL2, SBCAL3
2)	C00626 00190	SBCAL4, SBCNON, SBCX, SBCOPL, SBCOP2, SBCEND, SBCEN2, SBCFIX, SBCFXL, SBCFXE, POPJ2
2)	C00628 00191	SBCOK, SBCEN1, SBCLUZ, SBCLZ1, SBCNXT, SBCBP, SBCBPL
2)	C00630 00192	SBCCB, SBCCB1, SBCCB2, SBCCB8, SBCCB3, SBCCB4, SBCCB5
2)	C00632 00193	SBCCB6, SBCCB7, BITCNT, BITCN1
2)	C00633 00194	NEWBIT, NEWBT0, NEWBT1, NEWBT2, NEWBT3, NEWBT4, NEWBT5
2)	C00635 00195	NEWBTC, NEWBC1, NEWBC2, NEWBC3, NEWBNC, NEWBN1, NEWBN2, NEWBN3, NEWBCZ, NEWBNZ
2)	C00637 00196	SCCOM, SCCNOT
2)	C00638 00197	SCCBIT
2)	C00639 00198	MAKBIT, MAKBT0, MAKBT1, MAKBTN, MAKBN2, MAKBTB, MAKBB3
2)	C00641 00199	MAKBNB, MAKBBT, MAKBB2, MBDSP, MBIND, MBIND2
2)	C00643 00200	SCGEN
2)	C00644 00201	SCGEN1, SCGEN2, SCGEN3, SCGEN4, SCGEN5, SCGEN6
2)	C00646 00202	SCGTST, SCGT2, SCGT3, SCGDSP, SCGCN, SCGCN2, SCGBTN, SCGBT
2)	C00648 00203	SCGE, SCGE2, SCGEL, SCGBAK, SCGBK1, SCGBK2, SCGBK3, SCGFA, SCGNC, SCGNFA
2)	C00650 00204	SCGHB, SCGHB0, SCGHB5, SCGHB1, SCGHB2, SCGHB3, SCGHB4, SCGHBX, SCGHX2
2)	C00652 00205	SCGCB, SCGCB0, SCGCB1, SCGCB2, SCGCB3, SCGCB4, SCGCB5, SCGHCB
2)	C00654 00206	SBTMAK, SBTMK1, SBTMK2, SBTMK3, SBTMK4, SCGENB, SCGHB, SSVINS, SCXCT, SBKNW, SBKNWA, SBKDSP
2)	C00656 00207	SRCPAG SRCPG1 SPFIN SPFL SPFL2 SPFX NOSRC2 SRCLBL SRCPG3
2)	C00659 00208	GBYTP, GBYTPL, GBTPX, GBPDSP, GBPTAB
2)	C00660 00209	SRCPGF, SPFTAB, SPFCR, SPFLUZ
2)	C00661 00210	SRCPGB, SPFTAB, SBKNL, SBKNUL
2)	C00663 00211	SRCSET, SRCST1, SRCSTL, SRCST2
2)	C00664 00212	SCALL, SRCHX, SRCHLX
2)	C00666 00213	SCNBAK, SCNBKL
2)	C00668 00214	SCONTF SRCFNP SRCFNB SFNB2 SFRETR SRCDPY SRCDP2 SRCFPP SRCDP3 NOSRCP SRCHED, SRCDD
2)	C00673 00215	SRCFF, SFFNUL, SGTACS, SRTACS
2)	C00674 00216	SRCFB, SFBNUL, SBKNB, SBKNB2, SIOERR, SBKNP
2)	C00675 00217	JCTAB
2)	C00684 00218	J1DSP J2DSP J3DSP J4DSP J5DSP J6DSP J7DSP
2)	C00697 00219	PARGET NEXTLI ADJARG JNEW JMORE JUFIX JBLANK JMSTRT JSTART
2)	C00707 00220	JINIT JPREAD JMREAD SWTABL SWNOTE SWNOTT JUDATA JUTYPO
2)	C00715 00221	TJ1DSP TJROOM TABLE TJFILL TJUST TJDATA
2)	C00726 00222	SJFILL SJUSTA JFILL JUST JU7
2)	C00737 00223	IND INDENT INREAD CENTER ALIGN LFARR RTARR TIN SIN
2)	C00749 00224	JGINIT JGB JGIND JGMAR JGET
2)	C00755 00225	TJREAD TJADJ TJGET TJG1 TJTYPO
2)	C00766 00226	BREAK JOIN JOIN7
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 1,1

2)	C00779 00227	TJU1
2)	C00786 00228	MACRO FREE STORAGE - MFSCLR,GETMFS,FREMFS
2)	C00788 00229	MACTYI
2)	C00790 00230	ZDATA ZSIX ZBLT ZEDFIL ZLIST EXIST EXISTF ZSAVE ZFLDIR ZUNPAK
2)	C00805 00231	LAMBDA EPSIL NWFILE HOME QUERY HOMEG LAMBDG EPSIL5 LAMEPS EPSIL2 EPSIL3 EPSIL4 EPSIL1
2)	C00818 00232	********* BEG OF ESSAY DEFS *********
2)	C00837 00233	SUBSTR SUBST1 SUBOVE SUBST5 QFAST1 QFAST5 SUBSAY QFAST6 QFAST9
2)	C00844 00234	SPOOLC XSPOOL MAIOUT XWRDSP MAISPL XCLOSO XWRPM XWRDON XWRBF3 XWRTAB XWRLUP XWRLIN SPLINI
2)	C00855 00235	BEGIN SPSUB
2)	C00862 00236	FBISPC FBITAB ADRS FBINAM SAVCH2 SAVCHR TELBUF,CHKUP,CHECKU,CHTEXT,ASCASC,CHOUT3,CHOUT6
2)	C00872 00237	FILEID TELLME FBI
2)	C00891 00238	MAP
2)	C00899 00239	PAREN
2)	C00902 00240	PARSAV PARL PARR PAR PARFND PARB PAREXT PARRCD PARNUL
2)	C00924 00241	BACKGO BEEPCK BEEPST BEEPS1 BEEPME BEEPUU
2)	C00928 00242	MSG CHKMSG MSG0B MSG0A MSG0 MSG1 MSG2 MSG5 MSG6 MSG7 MSGLUZ MSGBK MSGBK0 CHKMS0
2)	C00936 00243	MACDEF MACCAL MACSTP MACESC MACLIN MACTYP MACINT MACLTT MACKLD
2)	C00951 00244	BURP BURPEX UPDATE PROTEC AUTOBU
2)	C00957 00245	MAIL SEND REMIND
2)	C00959 00246	ALIAS SETHED ALIAS2 ALIAS3 ALIAS4 ALIAS5 SETHD2
2)	C00962 00247	SAVE SPLSTR SAVFIL
2)	C00966 00248	LBLSRC LBLSR2 LBLERR LBLOOP
2)	C00969 00249	HEIGHT HEIGH2 HEIGH3 HEIGH4
2)	C00971 00250	PDL PATCH PAT ZVARS LEGTAB BUF TCBUF RBUF FNDTBF FNDBUF DIR SYSCMD TYIPNT
2)	C00973 ENDMK
2)	C⊗;
***************


**** File 1) E[CSP,SYS], Page 10 line 45
1)	;	SKIPE MARKS		;Are there any line marks
1)	;	PUSHJ P,XMPAGE		;Yes, so get last mark on page data
1)		TRNE F,REDNLY!DIROK
**** File 2) E.85[CSP,SYS], Page 10 line 45
2)		SKIPE MARKS		;Are there any line marks
2)		PUSHJ P,XMPAGE		;Yes, so get last mark on page data
2)		TRNE F,REDNLY!DIROK
***************


**** File 1) E[CSP,SYS], Page 23 line 46
1)	;	SKIPE MARKS		;Are there any line marks
1)	;	PUSHJ P,XMPAGE		;Yes, so get last mark on page data
1)		PUSHJ P,CORCHK
**** File 2) E.85[CSP,SYS], Page 23 line 46
2)		SKIPE MARKS		;Are there any line marks
2)		PUSHJ P,XMPAGE		;Yes, so get last mark on page data
2)		PUSHJ P,CORCHK
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 23,23

***************


**** File 1) E[CSP,SYS], Page 25 line 1
1)	;MARKS XMARK XXADD XXSUB XPADD XPSUB XLALL XXARRL XXPAGE XXLINE
1)	NMARKS←←27	;Max. no. of marks.
1)	IMPURE
1)	XXARRL:	0		;Holds line number at insertion or deletion point
1)	XXPAGE:	0		;Holds page number at insertion or deletion point
1)	XXLINE:	0		;Holds line number at insertion or deletion point
1)	MARKS:	BLOCK NMARKS
**** File 2) E.85[CSP,SYS], Page 25 line 1
2)	;MARKS XMARK XMPAGE XXADD XXSUB XPADD XPSUB XLALL XXARRL XXPAGE XXLINE
2)	NMARKS←←27	;Max. no. of marks.
2)	IMPURE
2)	XXARRL:	0		;Holds line number at a page insertion or deletion
2)	XXPAGE:	0		;Holds index value to MARKS at first entry for current page
2)	XXLINE:	0		;Holds MARKS line number from first entry for current page
2)	MARKS:	BLOCK NMARKS
***************


**** File 1) E[CSP,SYS], Page 25 line 19
1)		PUSHJ P,GPAGL
1)		MOVS D,T	;Get into MARKS format
1)		CAMN D,MARKS	;Are we at the first mark?
**** File 2) E.85[CSP,SYS], Page 25 line 19
2)		MOVE D,ARRL
2)		HRL D,CURPAG	;Get current location into mark-table format
2)		CAMN D,MARKS	;Are we at the first mark?
***************


**** File 1) E[CSP,SYS], Page 25 line 25
1)	Only one MARK and you are there! /]
1)		JRST PPJ1CR
**** File 2) E.85[CSP,SYS], Page 25 line 25
2)	There is only one MARK and you are there! /]
2)		JRST PPJ1CR
***************


**** File 1) E[CSP,SYS], Page 25 line 49
1)	XMOVE:	HLRZ A,MARKS(E)
1)		CAMG A,CURPAG
1)		CAMGE A,FIRPAG
1)		JRST XMOVE2		;Page is not in core
1)		SUB A,FIRPAG
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 25,25

1)		JUMPE A,XMOVE3		;On first page in core
1)		MOVEI G,XPLST
1)		HRRZ G,(G)
1)		JUMPE G,NEWPG4		;Use same error message (should never happen)
1)		SOJG A,.-2
1)		HLRZ A,2(G)		;Line number of last page mark on page
1)		HRRZ G,MARKS(E)
1)		ADD A,G
1)		JRST SETARR
1)	XMOVE2:	PUSH P,E
1)		PUSHJ P,NEWPG0
1)		POP P,E
1)	XMOVE3:	HRRZ A,MARKS(E)
1)		JRST SETARR
1)	XBACK:	CAMG D,MARKS(E)
**** File 2) E.85[CSP,SYS], Page 25 line 49
2)	XMOVE:	PUSH P,E	;Found it.
2)		HLRZ A,MARKS(E)
2)		CAMN A,CURPAG	;Save time if on right page already.
2)		JRST XMOVE3
2)		PUSHJ P,NEWPG0	;Go to right page.
2)		JFCL		;NEWPG0 skips on error, although that shouldn't happen here
2)		POP P,A
2)		HRRZ A,MARKS(A)
2)	XMOVE2:	PUSHJ P,SETARR	;Set arrow
2)		JRST JMPJMP	;and readjust window
2)	XMOVE3:	POP P,A
2)		HRRZ A,MARKS(A)
2)		MOVE E,TOPWIN	;Test to see if new position is at a reasonable place
2)		CAIL A,4(E)	;Between 4 below top
2)		CAILE A,36(E)	;and 4 above bottom allowed
2)		JRST XMOVE2	;It is not within limits so readjust window
2)		JRST SETARR	;Set arrow only
2)	XBACK:	CAMG D,MARKS(E)
***************


**** File 1) E[CSP,SYS], Page 25 line 94
1)		PUSHJ P, GPAGL
1)		MOVS D,T
1)		MOVEI E,0
**** File 2) E.85[CSP,SYS], Page 25 line 92
2)		MOVE D,ARRL
2)		HRL D,CURPAG		;Into form stored
2)		MOVEI E,0
***************


  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 25,25

**** File 1) E[CSP,SYS], Page 25 line 101
1)		EXCH D,MARKS(E)		;Make room
1)		SKIPLE D
1)		AOJA E,.-2
1)		POPJ P,
1)	XDELET:	MOVEI E,0
1)		PUSHJ P,GPAGL
1)		MOVS D,T
1)	XDEL2:	CAMGE D,MARKS(E)	;Find entry
**** File 2) E.85[CSP,SYS], Page 25 line 99
2)		MOVE A,ARRL
2)		CAMG A,XXLINE		;Is new mark later than XXLINE
2)		JRST .+3		;Yes
2)		MOVEM A,XXLINE
2)		MOVEM E,XXPAGE		;Reset for newly inserted mark
2)		EXCH D,MARKS(E)		;Make room
2)		JUMPLE D,.+2
2)		AOJA E,.-2
2)		POPJ P,
2)	XDELET:	MOVE E,XXPAGE		;Get starting place
2)		MOVE D,ARRL
2)		HRL D,CURPAG
2)	XDEL2:	CAMGE D,MARKS(E)	;Find entry
***************


**** File 1) E[CSP,SYS], Page 25 line 113
1)		HRRZS T			;Get page number
1)		HLRZ TT,MARKS-1(E)      ;and page numbers before and after
1)		HLRZ D,MARKS+1(E)
1)		CAME T,TT
1)		CAMN T,D
1)		SKIPA
1)		OUTSTR [ASCIZ/
1)	Removing last MARK on this page. /]
1)	XDEL4:	MOVE D,MARKS+1(E)	;Close ranks
1)		MOVEM D,MARKS(E)
1)		SKIPE D
1)		AOJA E,XDEL4
1)		POPJ P,
1)	;New code to cancel marks on current page
1)	XMARK0:	PUSH P,E
1)		MOVEI E,0
1)		PUSHJ P,GPAGL
1)		OUTSTR [ASCIZ/  MARKS on this page only have been cleared. /]
1)	XMARKA:	HLRZ TT,MARKS(E)
1)		CAMGE TT,XXPAGE
1)		JRST XMARKC		;Before page of interest
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 25,25

1)		CAME TT,XXPAGE
1)		AOJA E,XMARKA
1)		PUSH P,E
1)	XMARKB:	MOVE TT,MARKS+1(E)	;Close ranks after each deletion
1)		MOVEM TT,MARKS(E)
1)		SKIPLE TT
1)		AOJA E,XMARKB
1)		POP P,E
1)		JRST XMARKA
1)	XMARKC:	POP P,E
1)		POPJ P,
1)	;To handle a single line addition
**** File 2) E.85[CSP,SYS], Page 25 line 116
2)		MOVE D,ARRL
2)		CAMGE D,XXLINE		;Is it the the latest on this page?
2)		JRST XDEL4		;No
2)		HLRZ T,MARKS+1(E)	;Is it also the last one on this page?
2)		CAME T,CURPAG
2)		JRST XDEL3		;This was the only one
2)		HRRZ T,MARKS+1(E)
2)		MOVEM T,XXLINE		;Only XXLINE needs fixing, XXPAGE will be unchanged
2)		JRST XDEL4
2)	XDEL3:	SETZM XXLINE
2)		SETZM XXPAGE
2)		PUSHJ P,ABCRLF
2)		OUTSTR [ASCIZ /Last MARK on this page has been removed.
2)	/]
2)	XDEL4:	MOVE D,MARKS+1(E)	;Close ranks
2)		MOVEM D,MARKS(E)
2)		JUMPE D,.+2
2)		AOJA E,.-3
2)		POPJ P,
2)	;This routine reloads XXPAGE and XXLINE for the new page
2)	XMPAGE:	PUSH P,T
2)		PUSH P,E
2)		MOVEI E,0
2)		SETZM XXPAGE
2)		SETZM XXLINE
2)		HLRZ T,MARKS(E)
2)		CAMLE T,CURPAG
2)		AOJA E,.-2
2)		CAME T,CURPAG
2)		JRST XMPAG2		;No marks on this page
2)		MOVEM E,XXPAGE		;Store index for first mark on this page
2)		HRRZ T,MARKS(E)
2)		MOVEM T,XXLINE		;Store the line number
2)	XMPAG2:	POP P,E
2)		JRST POPTJ
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 25,25

2)	;New code to cancel marks on current page
2)	XMARK0:	MOVE A,XXPAGE
2)		SETZM XXLINE
2)		SETZM XXPAGE
2)		OUTSTR [ASCIZ/  MARKS on this page only have been cleared. /]
2)	XMARKA:	HLRZ T,MARKS(A)
2)		CAME T,CURPAG
2)		JRST POPJ1
2)		PUSH P,A
2)	XMARKB:	MOVE T,MARKS+1(A)
2)		MOVEM T,MARKS(A)
2)		SKIPLE T
2)		AOJA A,XMARKB
2)		POP P,A
2)		JRST XMARKA
2)	;To handle a single line addition
***************


**** File 1) E[CSP,SYS], Page 25 line 156
1)	;To make a single line removal
1)	XXSUB:	MOVNI T,1
1)		PUSH P,T
1)		PUSHJ P,XLALL
1)		POP P,T
1)		POPJ P,
1)	;New code to handle deletions and additions
1)	XLALL:	PUSH P,E
1)		PUSHJ P,GPAGL
1)		MOVEI E,0
1)		MOVE TT,-2(P)
1)	XLALL1:	HLRZ D,MARKS(E)
1)		CAMGE D,XXPAGE
1)		JRST XLALL2		;Before page of interest
1)		CAME D,XXPAGE
1)		AOJA E,XLALL1
1)		HRRZ D,MARKS(E)
1)		CAMGE D,XXLINE
1)		JRST XLALL2		;Before location of interest
1)		ADD D,TT
1)		CAMGE D,XXLINE
1)		MOVE D,XXLINE
1)		HRRM D,MARKS(E)
1)		AOJA E,XLALL1
1)	XLALL2:	JUMPGE TT,XLALL4	;No duplications possible on an insertion
1)		MOVEI E,0
1)		MOVEI TT,1(E)
**** File 2) E.85[CSP,SYS], Page 25 line 177
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 25,25

2)	;New code to handle deletions and additions
2)	XLALL:	MOVE T,XXLINE
2)		CAMGE T,ARRL
2)		POPJ P,			;All marks are before addition or deletion
2)		MOVE TT,-1(P)		;Lines added (may be negative)
2)		PUSH P,E
2)		MOVE E,XXPAGE
2)	XLALL1:	HRRZ T,MARKS(E)
2)		CAMGE T,ARRL
2)		JRST XLALL2
2)		ADD T,TT
2)		CAMGE T,ARRL
2)		MOVE T,ARRL		;Marks on deleted lines moved to ARRL
2)		HRRM T,MARKS(E)
2)		HLRZ T,MARKS+1(E)
2)		CAMN T,CURPAG		;Is next mark on this page? 
2)		AOJA E,XLALL1		;Yes
2)	XLALL2:	MOVE E,XXPAGE
2)		HRRZ T,MARKS(E)
2)		MOVEM T,XXLINE
2)		JUMPGE TT,XLALL4		;Through if additions
2)		MOVEI TT,1(E)
***************


**** File 1) E[CSP,SYS], Page 25 line 197
1)	XPADD:	MOVEI E,0
1)		PUSHJ P,GPAGL
1)	XPADD1:	HLRZ T,MARKS(E)
1)		CAMGE T,XXPAGE
1)	XPADD4:	POPJ P,
1)	XPADD2:	CAME T,XXPAGE	;Is it on the split page?
1)		JRST XPADD3	;No, so only page value needs to be changed
1)		HRRZ T,MARKS(E)	;Now attend to line number
1)		SUB T,XXLINE	;Where is it with respect to insertion
1)		ADDI T,1
1)		JUMPLE T,XPADD4	;It was before so we are through
**** File 2) E.85[CSP,SYS], Page 25 line 210
2)	XPADD:	PUSH P,E
2)		MOVEI E,0
2)		JRST XPADD2
2)	XPADD1:	HLRZ T,MARKS(E)
2)		ADDI T,1	;Compensate for fact that CURPAG was upped 1 by insertion
2)		CAMGE T,CURPAG
2)		JRST XPADD4
2)	XPADD2:	CAME T,CURPAG	;Is it on the split page?
2)		JRST XPADD3	;No, so only page value needs to be changed
2)		HRRZ T,MARKS(E)	;Now attend to line number
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 25,25

2)		SUB T,XXARRL	;Where is it with respect to insertion
2)		ADDI T,1	;This should go before the pushj.
2)		JUMPLE T,XPADD4	;It was before so we are through
***************


**** File 1) E[CSP,SYS], Page 25 line 213
1)	;This routine handles page mark deletions
1)	XPSUB:	HRRZ TT,XXLINE
1)	XPSUB0:	MOVEI E,0
1)	XPSUB1:	HLRZ T,MARKS(E)
1)		SUBI T,1		;Prepare to decrease page number
1)		CAMGE T,XXPAGE
1)		POPJ P,			;The rest are OK.
1)		CAMG T,XXPAGE		;Is it on the adjoined portion?
1)		ADDM TT,MARKS(E)	;Yes, so add to line number
1)		HRLM T,MARKS(E)		;Reducing page number by 1
1)		AOJA E,XPSUB1	;Safe because table terminates with -1
**** File 2) E.85[CSP,SYS], Page 25 line 229
2)	XPADD4:	POP P,E
2)		POPJ P,
2)	;This routine handles page mark deletions
2)	XPSUB:	PUSH P,E
2)		MOVEI E,0
2)		JRST XPSUB2
2)	XPSUB1:	HLRZ T,MARKS(E)
2)		SUBI T,1	;Compensate for fact that CURPAG was decreased by deletion
2)		CAMGE T,CURPAG
2)		JRST XPADD4	;The rest are OK.
2)	XPSUB2:	CAME T,CURPAG	;Is it on the ajoined portion?
2)		JRST XPSUB3	;No, so only page value needs to be changed
2)		MOVE T,XXARRL	;Line number on ajoined portion needs to be increased
2)		ADDM T,MARKS(E)	;Fix line number
2)	XPSUB3:	MOVN T,[1,,0]
2)		ADDM T,MARKS(E)
2)		AOJA E,XPSUB1	;Safe because table terminates with -1
***************


**** File 1) E[CSP,SYS], Page 27 line 30
1)		SKIPE MARKS
1)		PUSHJ P,XXSUB
1)		HLRZ T,TXTCNT(B)	;Get char count as stored
**** File 2) E.85[CSP,SYS], Page 27 line 30
2)		HLRZ T,TXTCNT(B)	;Get char count as stored
***************


  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 27,27

**** File 1) E[CSP,SYS], Page 27 line 54
1)	;	PUSH P,C		;Arg for XLALL
1)	;	SKIPLE MARKS		;Are there marks?
1)	;	PUSHJ P,XLALL		;Fix up marks
1)	;	POP P,C
1)		POP P,T
**** File 2) E.85[CSP,SYS], Page 27 line 52
2)		PUSH P,C		;Arg for XLALL
2)		SKIPLE XXLINE		;Are there marks on this page?
2)		PUSHJ P,XLALL		;Fix up marks
2)		POP P,C
2)		POP P,T
***************


**** File 1) E[CSP,SYS], Page 28 line 3
1)	DELPM:	SKIPN MARKS		;Are there any line marks?
1)		JRST DELPMA
1)		PUSHJ P,GPAGL
1)		PUSHJ P,XPSUB		;Note, this leaves a final correction to DELPR2
1)		
1)	DELPMA:	TRNE F,REDNLY+EDDIR
1)		JRST [TLO F,PMLIN↔JRST DELL2]
**** File 2) E.85[CSP,SYS], Page 28 line 3
2)	DELPM:	TRNE F,REDNLY+EDDIR
2)		JRST [TLO F,PMLIN↔JRST DELL2]
***************


**** File 1) E[CSP,SYS], Page 31 line 10
1)		SKIPN MARKS		;Are there line marks?
1)		JRST DELETC
1)		MOVE T,CURPAG
1)		HRRZM T,XXPAGE		;Number of last page in core
1)		SUB T,FIRPAG
1)		JUMPE T,DELETB
1)		MOVEI G,XPLST
1)		HRRZ G,(G)
1)		JUMPE G,NEWPG4
1)		SOJG T,.-2
1)		HLRZ TT,2(G)		;Line number for last page mark in core
1)		MOVNS TT
1)		ADD TT,LINES
1)		SKIPA
1)	DELETB:	MOVE TT,LINES
1)		HRRZM TT,XXLINES
1)		PUSHJ P,XPSUB
1)	DELETC:	PUSH P,LINES
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 31,31

1)		JSP B,ADDPAG
**** File 2) E.85[CSP,SYS], Page 31 line 9
2)		PUSH P,LINES
2)		JSP B,ADDPAG
***************


**** File 1) E[CSP,SYS], Page 31 line 60
1)		TLO F,DSPTRL		;Force recalculation of trailer values
1)		PUSHJ P,RDSPA4		;Update page numbers on header line
**** File 2) E.85[CSP,SYS], Page 31 line 41
2)	;	PUSH P,T
2)		HLRZ T,MARKS
2)		SUBI T,1
2)		CAML T,CURPAG
2)		PUSHJ P,XPSUB		;At least one mark needs attention
2)	;	PUSHJ P,RDSPA1		;Now fix page numbers in the trailer
2)	;	PUSHJ P,DSTRL		;and make sure that the trailer is redisplayed
2)		TLO F,DSPTRL		;Force recalculation of trailer values
2)	;	POP P,T
2)		PUSHJ P,RDSPA4		;Update page numbers on header line
***************


**** File 1) E[CSP,SYS], Page 34 line 5
1)	INSER0:	SKIPLE MARKS			;Are there any line marks?
1)		PUSHJ P,XPADD			;Fix them up now
1)		MOVEI B,LLDESC+LPMTXT+2		;MARK command enters here
1)		PUSHJ P,FSGET
**** File 2) E.85[CSP,SYS], Page 34 line 5
2)	INSER0:	MOVEI B,LLDESC+LPMTXT+2		;MARK command enters here
2)		PUSHJ P,FSGET
***************


**** File 1) E[CSP,SYS], Page 37 line 26
1)		PUSHJ P,INSER0		;Insert pagemark (also fixes line MARKS)
1)		HRRZ A,LLDESC+LPMTXT+1(B)
**** File 2) E.85[CSP,SYS], Page 37 line 26
2)		PUSHJ P,INSER0		;Insert pagemark
2)	;This code is to be put in where one returns from a page mark insertion
2)		PUSH P,T
2)		HLRZ T,MARKS
2)		ADDI T,1
2)		CAML T,CURPAG
2)		PUSHJ P,XPADD		;At least one mark needs attention
2)		POP P,T
2)		HRRZ A,LLDESC+LPMTXT+1(B)
  1) E[CSP,SYS] and 2) E.85[CSP,SYS]	1-25-77 10:25	pages 37,37

***************


**** File 1) E[CSP,SYS], Page 39 line 25
1)		SKIPG MARKS		;Are there marks
1)		JRST .+4
**** File 2) E.85[CSP,SYS], Page 39 line 25
2)		SKIPG XXLINE		;Are there marks on this page
2)		JRST .+4
***************


**** File 1) E[CSP,SYS], Page 41 line 53
1)		SKIPG MARKS		;Are there marks?
1)		JRST .+4
**** File 2) E.85[CSP,SYS], Page 41 line 53
2)		SKIPG XXLINE		;Are there marks on this page
2)		JRST .+4
***************


**** File 1) E[CSP,SYS], Page 42 line 30
1)		JRST GPAGL4
1)	GPAGL1:	HLRZ T,2(TT)
**** File 2) E.85[CSP,SYS], Page 42 line 30
2)		POPJ P,
2)	GPAGL1:	HLRZ T,2(TT)
***************


**** File 1) E[CSP,SYS], Page 42 line 45
1)	GPAGL4:	HRRZM T,XXPAGE	;Needed by XMARK routines (added 1/18/77 by ALS)
1)		HLRZM T,XXLINE
1)		POPJ P,
**** File 2) E.85[CSP,SYS], Page 42 line 45
2)		POPJ P,
***************


**** File 1) E[CSP,SYS], Page 56 line 11
1)		SKIPG MARKS		;Are there marks?
1)		JRST .+4
**** File 2) E.85[CSP,SYS], Page 56 line 11
2)		SKIPG XXLINE		;Are there marks on this page
2)		JRST .+4
***************